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PREFACE 

MEDIT  is  a computer  program  designed  to  assist  a programmer  in  the 
maintenance  of  a large  source  library.  Such  a program  is  provided  as  an 
utility  program  by  every  major  computer  manufacturer,  therefore  some 
justification  must  be  given  for  the  subject  of  this  report. 

The  author  is  familiar  with  the  following  vendor  supplied  utility 
programs : 

a.  IEBUPDAT  for  IBM-360  and  IBM-370  computers. 

b.  IEBUPDTE  for  IBM-360  and  IBM-370  computers. 

c.  SETUP  for  CDC-6000  computers. 

d.  UPDATE  for  CDC-6000  computers. 

e.  EDIT,  written  by  the  Systems  Research  Group,  The  Ohio  State 
University. 

In  addition,  the  author  is  cognizant  of  similar  utility  programs  supplied 
by  UNIVAC,  Burroughs,  Digital  Equipment  Corporation,  and  Computer  Sciences 
Corporation.  The  following  comparisons  are  based  on  the  author's 
experience: 

i.  EDIT  is  the  easiest  to  use. 
ii.  UPDATE  provides  the  most  useful  features. 

Hi.  None  of  these  are  portable  - none  can  be  easily  transferred 
to  another  vendor's  hardware. 

The  intent  in  writing  MEDIT  was  to  provide  a source  library  maintenance 
utility  that  was  easy  to  use  (as  is  EDIT),  that  provided  useful  capabili- 
ties (as  UPDATE) , and  that  can  be  easily  transported  from  one  machine  to 
another.  The  actual  program  described  must  be  viewed  as  Version  1 of 
the  desired  program.  MEDIT  is  as  easy  to  use  as  EDIT  but  does  not  provide 
all  the  useful  features  of  UPDATE.  Future  versions  of  this  program  will 
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1.0  INTRODUCTION 


Basically,  there  are  two  techniques  of  developing  a computer  program. 
The  first  technique  is  to  maintain  a deck  of  the  program’s  source  state- 
ments and  make  changes  to  the  program  by  manual  insertion,  removal,  or 
replacement  of  cards  in  this  deck.  This  manual  technique  is  adequate  if 
the  number  of  cards  in  the  deck  is  small,  say  less  than  500.  When  the 
source  deck  becomes  large,  or  several  people  are  making  simultaneous 
changes,  this  manual  technique  becomes  inadequate:  every  computer  run 

involves  handling  a large  number  of  cards;  no  audit  trail  is  kept  of  the 
changes  that  have  been  made;  and  locating  the  correct  cards  to  change  is 
difficult,  time  consuming,  and  prone  to  error. 

The  second  technique  is  to  use  a computer  program  called  an  editor 
to  make  the  desired  changes.  The  source  deck  is  stored  on  disk  or  tape 
so  that  large  numbers  of  cards  do  not  have  to  be  handled.  The  source 
cards  are  numbered  so  that  location  of  a certain  card  is  easy  and  natural. 
The  changes,  and  only  the  changes,  are  punched  on  cards.  These  cards 
serve  as  a record  of  the  changes  that  have  been  made.  These  editor  pro- 
grams usually  permit  the  separation  of  the  entire  source  program  into 
independent  subunits  (for  example,  a subroutine  or  function)  and  permit 
reference  to  one  or  more  of  these  subunits  without  having  to  refer  to  the 
others.  The  complete  source  program  is  called  a library  and  each  of  the 
subunits  is  called  a module. 

The  computer  program  MEDIT  is  designed  for  the  maintenance  of  a 
large  library  consisting  of  one  or  more  modules.  The  use  of  MEDIT  pro- 
ceeds in  several  steps.  The  first  step,  described  in  Chapter  2,  is  to 
use  MEDIT  to  create  a base  module  of  the  original  source  decks.  This 
base  module  consists  of  a tape  or  disk  file  with  80  characters  per  record 
(card  image)  and  with  sequence  numbers  in  columns  77  through  80.  The 
second  step,  described  in  Chapter  3,  is  to  make  and  test  changes  to  this 
base  module.  This  consists  of  running  MEDIT  to  create  a test  module 
consisting  of  the  base  module  as  altered  by  edit  commands,  then  compiling 
and  executing  this  test  module.  Once  the  changes  have  proven  successful, 
they  fan  be  made  permanent  by  creating  a new  base  module  as  described  in 
Chapter  4.  Creating  a new  base  module  should  be  avoided  if  at  all  possible. 
The  time  to  create  a new  base  module  is  either: 
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a.  When  production  runs  of  the  test  version  are  nearly  completed  and 
the  user  is  very  sure  that  no  additional  changes  will  be  required;  or 

b.  When  the  edit  command  deck  exceeds  1000  cards,  approximately 
one-half  a box  of  cards. 

The  base  module  is  a sequential  file  of  card  images  with  sequence 
numbers  in  columns  77  - 80.  Columns  1-72  contain  data  or  source  state- 
ments. This  file  can  be  used  as  the  source  for  a compiler.  An  MEDIT 
run  produces  a module  called  a test  module  that  reflects  every  change  to 
the  base  module  and  is  suitable  for  compilation.  Columns  73  - 76  are 
not  used  in  the  base  module.  These  columns  are  used  in  the  test  module. 

The  input  to  MEDIT  consists  of  control  cards  that  give  a detailed 

description  of  the  changes  to  be  made  to  the  base  module.  A MEDIT  run 
provides  a listing  of  all  the  control  cards  and  a detailed  listing  of  all 
the  changes  made  on  this  run.  The  first  control  card  serves  as  a title 
that  is  printed  at  the  top  of  every  page  of  the  listing. 

The  format  for  an  edit  command  is: 

Columns  1-2: 

Two  characters  that  identify  this  card  as  an  edit  command.  While 
the  two  characters  ..  are  used  in  this  report,  any  other  combination  of 
two  characters  may  be  used.  Examples  are  /.  and  ./  and  $$  and  **.  Do 
not  mix  the  characters  in  any  one  MEDIT  run  — use  the  same  characters 
throughout. 

Column  3: 

One  character  that  identifies  the  type  of  MEDIT  command.  Chapter  3 
lists  the  valid  MEDIT  commands  and  their  meanings. 

Columns  4 - k: 

One  or  two  decimal  numbers.  A comma  separates  the  numbers  if  there 
are  two  numbers. 

Columns  k+1-72: 

See  a description  of  the  E-Command.  Placing  comments  here  that 
describe  the  change  being  made  is  highly  recommended. 

Columns  73  - 80: 

Not  used  by  MEDIT  and  not  listed. 

Any  card  that  is  not  a MEDIT  command,  i.e.,  any  card  whose  first  two 
characters  disagree  with  columns  1 - 2 of  an  edit  command,  is  treated  as 


a data  card  to  be  inserted  into  the  test  module.  The  placement  of  inserted 
cards  is  determined  by  the  latest  preceeding  edit  command. 
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2.0  CREATING  A BASE  MODULE 


Before  a module  can  be  updated,  it  must  be  created.  The  program 
MEDIT  is  written  to  make  library  creation  easy.  A module  is  created  by 
reading  the  deck  of  cards  in  the  desired  order.  Figure  2.1  shows  a 
sample  edit  command  deck  to  create  a base  module.  Figure  2.2  shows  the 
output  from  MEDIT  that  results  from  these  edit  command  cards. 

The  base  module  is  a copy  of  the  control  deck  except  that  the  cards 
in  each  deck  are  numbered  sequentially  in  columns  77  - 80  for  later 
reference.  If  this  base  module  is  then  compiled,  a complete  listing  of 
the  base  module  together  with  sequence  numbers  will  be  obtained.  This 
listing  should  be  kept  as  a reference  for  as  long  as  the  base  module  is 
kept.  The  binary  deck  output  from  this  compilation  may  also  be  saved. 

In  summary,  the  MEDIT  run  to  create  a library  should  result  in: 

a.  A base  module  with  sequence  numbers; 

b.  A listing  of  the  contents  of  the  base  module;  and 

c.  The  compiled  version  of  the  base  module. 

The  various  parts  of  Figure  2.3  show  the  job  control  cards  to  create 
a base  module  without  compilation  at  each  installation  where  MEDIT  has 
been  implemented. 
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Figure  2.1  First  Part  of  an  Edit  Command  Deck  to  Create  a Base  Module 
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♦ c data  initial i7ation 

♦ DATA  SPACE/lH  /.comma/1 h ,/ ,mEO/I hm , 1HE. 1HD. 1HI , 1HT. 1H  / 

♦ DATA  0 I G T T / 1 > (0 . 1 H 1 . 1 HP • 1 H J « 1 HA . 1 HS . 1 H6 ♦ 1 H7  * 1 HP . 1 H9 / 

♦ DATA  CLD/O/.  jEW/n/.r  FRRS/0/.P.AOf /O/ 

♦ DATA  L INF/50/. MAXL IN/GO/ 

♦ DATA  NTYPE/S/.TYPE/lHw.lH-.lHC.lHL ,\he/.endsm/. False./ 

♦ C FORMAT  FOP  BASF  AND  INStPT  TO  TEST 

♦ 100(1  FORMAT  (7?Al,4X«lA) 

♦ C FORMAT  FOR  TEST 

♦ 2 OOP  EOPmaT <7?A1 ,2T4) 

♦ c FORMAT  E DR  CmND 

♦ Bonn  fopmatispad 

♦ C FORMAT  FOP  TITI.F  LINE 
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Figure  2.2  First  Page  of  MEDIT  Output  When  Base  Module  is  Created 
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FI  SURE  ? • 3 - JOH  CONTROL  TO  CREATE  A BaSE  HOOULE 

PART  1 - AT  USA  AVS COM,  ST.  LOUIS 

//MV4LIO  JOB  (1T01»M999) *«VALI0  J03  CARD' 

/*SETIJ=  DMSENN 
//NEW  EXEC  MEOITFlG 

//EDIT. TEST  DO  DISP  = (NEW. KEEP) *DsN=YOUR.SOJRCE.BAsEl * 

//  JNIT=231 A, VOL=SER=OMSENN 

//EDI T . STS  I N DO  * 

SO JRCE  DECK 

... 

/* 

//FORT.SYSLIN  DD  DISp=(NEw, KEEP) ,OSN=YOUR. BINARY. rASEI, 

//  VOL=SER=DMSENN, 

//  JNlT=23lAt SPACEs (TRK, < 1» 1 ) ,RLSE>  TO  SAVE  BINARY 

//GO.SYSIN  DO  * 

... 

DATA 

... 

/» 


AVAILABLE  PROCS- 

MEOIT  - FOR  ME 0 1 T ONLY 
MEDITAt  ME0ITA3,  MEolTAL, 
MEOI T r , MED  I TE  3 * MEOIT^L* 
MEDITM»  MEDITHL.  MEOIT-tLS 
MEOITP»  MEOITP3.  MEnIT=Lt 
MEDITKAT  - FOR  WATFJV 


MEDITALG  - FOR  assemblER-g 
MEOITFLG  - for  fortram-g 

- FOp  FORTRAN-H 
MEOItRLG  - FOR  PL/I 


SU  - F I X G MEANS  LDaD-ANO-GO 
SUrrJX  L MEANS  LINK-EOlT 
SU-FIX  LG  MEANS  LINK-EDIT  ANn  so 
NOTE  - PR0CS  AUTOMATICALLY  USE  RODMAN  CAfCOMP  lISPARY. 


PART  ? - AT  USAMSSA  (PENTAGON) 


//ZXNA^ERO  JOB  (2A01  , iZ07, 1 120*  9o9i 1 * 1 ,P> , 

//  * i h valid  job  card  im,class=d 

/•ROUT-  XEQ  CAA-PIA 
//NEW  -XEC  MEDITFL5 

//EDIT. TEST  DD  D I SP= ( NE W , KFEP ) » DSN  = YOUR . SO JRCE . B ASE 1 * 

//  UNIT=3330. VDL=SFR=JSAAWC 

//EDIT , SYS  I N DD  * 

• • • 

SO JRCE  DECK 

• • • 

/* 

//FORT.SYSLIN  DD  niSP= (NEW, KEEP), DSN=Y OUR. BINARY.rASEI, 

//  VDL=SER=USAAWC, 

//  JNIT=3330, SPACE- (TRK, (1 , 1 ) ,RLSE>  TO  SAVf  BINARY 

//GO.SYSIN  00  * 

... 

DATA 


... 

/• 

//MARSOATA  DO  RECORD=Z30001“76 

available  PROCS  same  AS  AT  AVSCOM. 

Figure  2.3  Job  Control  to  Create  a Base  Module 
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FIGURE  ? • 3 - JOB  CONTROL  TO  CREATE  A SftSE  MODULE  (CONT) 


PART  3 - AT  HOPKINS  (APL) 

//AAWCXXXX  JOB  (6A01XXXX.C.U.N) »» VALID  JOB  CARD' 

//NEW  "XEC  meoITc-Uj 

//EDIT. TEST  00  D I SP=  ( HEP  » C aTL«  ) « DS  N=  6AWC  . YOUR . SO  JRCE  . B ASE 1 * 

//  JNIT=3330. VOL=SER=JSaAWC 

//EDIT.SYSIN  DO  * 

SO  JRCE  OECK 

• • • 

/* 

//FORT.SYSLIN  do  DISD= (NEW. CATLG) , OSN=aAWC. TOUR. 3TNARV.8ASE1 * 
//  VOL=S£R=JSaa*C» 

//  JNIT=3330.SPACE=(TRK, (1.1) ,RLSE)  TO  SAVE  9INART 

//GO. S VS  In  00  * 

... 

DATA 


/* 


. . . 


AVAILABLE  P ROCS  SAME  AS  AT  AVSCOM. 


Figure  2.3  Job  Control  to  Create  a Base  Module  (cont) 
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The  following  page  is  blank 


3.0  CHANGING  AND  TESTING 


Once  a base  module  has  been  created,  changes  to  It  may  be  required. 
The  program  MEDIT  can  be  used  to  make  these  changes  and  produce  an  updated 
or  test  version  of  the  module.  This  test  module  should  be  used  to  compile 
and  test  the  changes. 


The 

MEDIT  commands  to 

make  changes  to  the  base  module  are: 

a. 

. .+n 

to  insert  cards  after  card  n 

b. 

. .-n,m 

to  delete  cards  n through  m inclusive 

c. 

. ,-n 

same  as  . .— n,n 

d. 

. .Cn,m 

to  place  a ’C’  in  column  1 of  cards  n 
through  m inclusive 

e. 

. .Cn 

same  as  ..Cn,n 

f. 

. .Un,m 

to  place  a space  in  column  1 of  cards 
n through  m inclusive 

g. 

..Un 

Same  as  ..Un,n 

h. 

. .En,m!old!newI 

to  edit  test  on  cards  n through  m inclusive 
(See  below) 

i. 

. .En I old  I new I 

same  as  . .En,n!old!new! 

Any  card  that  is  not  an  MEDIT  command  is  treated  as  a card  to  be  inserted. 
All  card  numbers  refer  to  the  sequence  numbers  in  the  base  module  and 
must  appear  in  numerical  order.  Cards  may  be  inserted  in  place  of  deleted 
cards  by  coding  the  appropriate  ..-  card  followed  by  the  card(s)  to  be 
inserted.  Cards  can  be  inserted  before  the  first  card  in  the  deck  by 
placing  them  immediately  after  a ..+0  card  at  the  beginning  of  the  edit 
command  deck.  A sample  to  illustrate  all  this  is  given  in  Figure  3.1. 
MEDIT  output  from  an  update  run  is  shown  in  Figure  3.2. 

A short  summary  of  the  logic  of  MEDIT  will  serve  as  a detailed 
description  of  the  various  MEDIT  commands.  In  the  main  loop  of  MEDIT, 
an  input  card  is  read.  If  this  card  is  not  an  MEDIT  command  (columns  1 
and  2 are  tested),  then  this  card  is  written  to  the  test  module.  If 
the  input  card  is  an  MEDIT  command,  then  the  appropriate  action  is  taken 
as  follows. 

If  the  input  card  is  an"insert"command  (..+n),  then  the  base  module 
is  copied  to  the  test  module  with  the  base  module  card  numbered  n being 
the  last  card  copied.  In  conjunction  with  the  treatment  of  non-MEDIT 
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.♦0  convfpt  Mpn i"t  vFoc [OM  ? TC  CDC-^nnn  SCOPE 

PROPWam  MTnIT  (Pf.SF  »TF5T  . T \PUT  • 01.  Tpi)T  . 

1 TAPFlsnASF  ,T4PF?  = TFCT,TAPfcS=I,''PLT  ,TAP£ft=OL'TPUT) 

. -?4 

I Of. T C aL  F-f.nSw 

.F .26.32!  f I'jTF0FR*2  ! I OTFGF  P ! 

• F3-1 ! SO  ! 55  i 
.♦30 


• ~65 

PFAD  (P.500O)’  CMNO 

IF (FOF (5) .kF.O)  GO  TO  OO0 

.-W 

loo  of  on  (c.sooo)’  ri\no 

IF (FOF (5) .Mt .0)  00  TO  00 0 

.“240 

»Fann  ,1000)  oi  ocn.oiJ) 

TF  (FPF  ( 1 ) . f'L  . 0 ) r.o  TO  i op 
.-203, ?P4 

401  pfao ( i , i non)  ci.oco.oli) 

IF  (For  ( 1 ) .£0.0  ) fiO  ro  400 


Figure  3.1  Sample  Edit  Command  Deck 


1 


..Mt'DU 


CONVERT  MFDIT  VFPSiru  2 TC  COC-AOrO  SCOPF 


PAGF  1 


E 

E 

F 

E 

E 

E 

E 

E 


..♦0  CCMVrFT  vfiilT  VFRMn"  J T C 000*001)  SCOPE 

PROGRAM  PfcllTT  (BASF  ,TF«T , Ir.PCT  .OCTPtJT  . 

I TAPE l=»ASF. TAPr?= TPFT, TAPERS  1 MH. T , T aPE6=0LTPUT> 

..-?A 

i cgtfai  «i  f* dsw 
I.OOTCAI.  FNOS'J 

..F?A«32!  T NTEGF6  *2  I If'TFGF  U ! 

IMF  OF  R "T  YPF  • T YPF  (G ) 

1MF0FW  rt-  .li-!  (72)  (72)  ,U.CCi:  ( 7?)  .PEI,  (6) 

JETFGfP  nm.-.-F  -'.PAGr  .1  H tl.-'AXLlN  ,NFKPS«tHAR(2)  . THIS.NCOL 
TWTfgaw  sP  irr  ,rop,yA,tnr,i  m im 
1NTFGFR  Mll-'.T 

C «* o « »*« * Foil  0>,  1 ' G | or,  f o [t  r 'ii<  ItxT  FIllT  FFaTupE  ONLY  *•*«*«*•**** 

InTFGFK  NFSCn  (73)  ,1  01  n , ;<0L  U ,1.  ME  w . ON  F w , 1 COL  . JCOL  ,KCCL 

» ,E  m 1 SO ! s5 ! 

DATA  I.1H /55/.MAXL  TN'/SG/ 

..*10 

C 

..-*s 

PF  AO  (StSOOO.Ff  0=900  ) 0"l\0 

RE  AO  <5  ,SnO[) ) C”NO 

TF  (F()F  (5)  .tIF.O)  GO  TO  0(10 

. ,-nw 

inn  pf  An  is  .soon  ,ri  i)=9nn ) r-,M/ 
inn  pFr.n(5.Soom  c-'Gi) 

TF (FOF (SI ,'IF.n)  GO  TO  «O0 

PFAnn  ,inuo,FEO=ig?)  OI.CCO.CLC 
PF  AO  (1,1  n 11 0 ) OLOCD.Ol.r 
IF (FOF ( 1 ) . MF.O)  GO  TO  102 
••-283,284 

Am  RF An  ( 1 , 1 nOO  .FMTsAO?)  Qt_OC.l)  ,CLD 

GO  to  Ann 

a o i pf Ann, loom  mnco. oi.n 

IF  (FOF  (1  ) .FO.m  GO  TO  Ann 


1 ♦ 
2 * 

24  25  - 

26  ♦ 

26  26  F 

27  29  F 

2 fi  3U  F 

29  31  F 

30  32  F 

31  33  F 

32  3A  F 

38  AO  E 


65  67  - 

66  ♦ 
69  ♦ 

88  91  - 

92  ♦ 

93  ♦ 

248  252  - 
253  ♦ 

?SA  ♦ 

283  286  - 
28A  2 68  - 

289  ♦ 

290  ♦ 


NO  ERRORS  FNCOUNTLpFU.  UORPM  FNl)  10  MED  I T , 


Figure  3,2  MEDIT  Output  from  Sample  Edit  Command  Deck 
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commands,  this  will  cause  cards  to  be  inserted  in  the  appropriate  position 
in  the  test  module. 

If  the  input  card  has  any  of  the  other  forms  (..-n  or  ,.-n,m  or 
,.Cn  or  ..Cn,m  or  ..Un  or  . ,Un,m  or  ..En  or  ..En,m),  then  the  base  module 
is  copied  to  the  test  module  with  the  base  module  card  numbered  n-1  being 

the  last  card  copied.  This  positions  both  the  base  and  test  modules  for 

the  appropriate  action.  t 

If  the  input  card  is  a "delete" command  (..-n  or  ..-n,m),  then  the 
base  module  is  read  until  the  appropriate  base  module  card  numbered  m 
has  been  read.  Since  these  cards  are  not  copied  to  the  test  module,  they 

are  deleted  from  the  test  module.  In  conjunction  with  the  treatment  of 

non-MEDIT  commands,  this  can  be  used  to  insert  cards  in  place  of  the 
deleted  cards. 

If  the  input  card  is  a "comment"  command  (..Cn  or  ..Cn,m),  then  the 
base  module  is  copied  to  the  test  module  with  the  character  C replacing 
the  first  column  of  each  card.  This  converts  each  of  the  cards  to  a 
FORTRAN  comment  card  in  the  test  module. 

If  the  input  card  is  an  "uncomment"  command  (..Un  or  ..Un,m),  then 
the  base  module  is  copied  to  the  test  module  with  the  blank  character 
replacing  the  first  column  of  each  card.  This  converts  each  of  the  cards 
to  a FORTRAN  statement  in  the  test  module.  The  "uncomment"  command  should 
be  used  only  on  cards  that  have  been  "commented"  when  the  base  module 
was  created. 

If  the  input  card  is  an  "«dit  text"  command  (..En  or  ..En,m),  then 
the  first  character  after  the  line  number  on  the  input  card  is  used  as 
a character  string  delimiter  to  determine  the  "old  string"  and  "new  string" 
on  the  input  card.  In  the  example  "edit  text"  comnand: 

. .E54,59!THIS!TH0SE! 

The  exclamation  point  (!)  is  the  delimiter,  the  "old  string"  is  the 
characters  THIS  and  the  "new  string"  is  the  characters  THOSE.  Any  character 
except  a comma  may  be  used  as  a delimiter.  The  delimiter  cannot  be  used 
in  either  the  "old  string"  or  the  "new  string." 

The  basic  operation  of  the  "edit  text"  operation  is  to  copy  cards 
from  the  base  module  to  the  test  module.  However,  before  each  card  is 
copied,  it  is  searched  for  occurances  of  the  "old  string."  Every  occurance 
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of  the  "old  string"  is  replaced  by  the  "new  string"  before  the  card  is 
copied.  Thus,  in  the  example  "edit  text"  command,  every  occurance  of 
the  characters  THIS  on  cards  54  through  59  will  be  replaced  by  the 
characters  THOSE  in  the  test  module. 

Making  changes  to  a base  module  and  testing  these  changes  proceeds 
as  follows: 

a.  An  edit  command  deck  is  used  to  make  changes  to  the  base  module 
producing  a test  module.  Any  old  binary  decks  for  this  module  should  be 
purged. 

b.  This  test  module  is  compiled  and  tested.  The  resulting  binary 
deck  may  be  saved  but  the  test  module  is  not . 

c.  If  this  test  module  is  still  not  correct,  additional  changes 
are  added  to  the  edit  command  deck  and  the  process  repeated  from  step 
a.  above. 

Note  that  the  test  module  is  not  saved,  only  the  compiled  version 
of  the  test  module.  Any  new  changes  will  be  made  to  the  base  module  so 
that  the  edit  command  deck  will  serve  as  a detailed  record  of  every 
change.  Returning  to  the  base  module  for  every  change  also  prevents  a 
proliferation  of  versions  of  the  program  and  the  attendant  confusion  and 
waste  of  computer  storage  (disk  or  tape) . 

The  test  module  which  is  produced  by  a MEDIT  run  has  two  sets  of 
sequence  numbers.  One  set,  in  columns  77  - 80,  are  sequential  starting 
with  1.  The  other  set,  in  columns  73  - 76,  are  copied  from  the  base 
module.  For  cards  that  have  been  inserted,  columns  73  - 76  are  blank. 

This  set  of  sequence  numbers  are  copied  from  the  base  module  to  facilitate 
making  additional  changes  since  all  edit  commands  refer  to  the  sequence 
numbers  in  the  base  module.'  The  listing  of  the  test  module  can  be  used 
to  locate  additional  changes  to  the  base  module  and  the  corresponding 
edit  command  cards  placed  appropriately  in  the  edit  command  deck. 

The  various  parts  of  Figure  3.3  show  the  job  control  to  make  changes 
to  a library  at  each  installation  where  MEDIT  has  been  implemented.  Please 
note  that  the  module  of  the  changed  source  is  not  saved.  These  changes 
should  be  made  for  every  test  run  until  a new  base  module  is  created 
(Chapter  4).  A new  base  module  should  not  be  created  until  all  potential 
changes  have  been  proven  correct. 
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figure  3.3  - joe  control  td  eoit  a module 

PART  1 - AT  USA  AVSCOM,  ST.  LOUIS 

#* 

//MVALID  JOB  UT01.M99?) ,*A  VAlIO  JOB  CARD* 

//EOTT  EXEC  MEDITFLR 

//EDTT.H4SE  DO  OISa=OLO. ^SN=YOu«. SOURCE. 9ASEI^ 

//  UNITs?3l4, VOL=SER=DMSENN 

//EDTT*SYSIN  DO  * 

..♦o  title  card  - appeaps  at  top  of  every  page 

• • • 

EOIT  COMMAND  DECK 

... 

/* 

//EOTT. PURGE  00  DISP=(MOD. DELETE) ,DSN*YOJR. BINARY. PasEI, 
//  UnIT=2314,  V0l=SER=0MSENN  TO  PURGE  OLD  BINARY 

//FORT.SYSLIN  30  DI SP= ( NE W , K EE° ) . DSN= YOUR. BI NA Ry . 8 A SE 1 » 
//  UnIT=2314. vol=ser*dmsenn, 

//  SPACE=(TR<» (1,1) ,RlSE)  ---  TO  SAVE  BINARY 

//GO. SYSIN  00  * 

... 

DATA 

... 

/* 

PROCS  SAME  AS  AT  AVSCOM.  PROCS  LISTED  IN  FIG.  2.3. 


PART  2 - AT  USAMSSA  (PENTAGON) 

//ZXNAMERO  JOB  (2401 ,1707*1*20, 999,1 ,1 ,P) , 

//  . • 1 H VALID  J03  CARO  U*,CLaSS»0 

/•ROJTE  XEQ  CAA-RIA 
//EOTT  EXEC  MEOITFLG 

//EOTT. RASE  DO  DIS==OLO*DSN=AAwC. YOUR. SOURCE. 3ASE1 
//EOTT. SYSIN  DO  * 

..♦o  title  card  - appears  at  top  op  every  page 

... 

EOIT  COMMAND  DECK 

... 

/* 

//EDIT.  PURGE  00  DSN=  a a <tC.  . YOUR,  ol  NAR  Y .BASE  1 , 

//  OISP=(MOO,OELFTE)  TO  DELETE  OLO  BINARY 

//FORT.SYSLIN  OD  DISP=  (NFW, CAT)  G)  ,DSN=AA<TC.  YOUR. BINARY. BASE1  * 
//  UNIT  = 333l),  VOLsSERsUSAAWC, 

//  SPACE=(TRK, (1,1) ,RLSE)  ---  TO  SAVE  BINARY 
//GO. SYSIN  DD  * 

... 

OAT  A 

... 

/* 


PROCS  SAME  AS  AT  AVSCOM.  PROCS  LlSTED  IN  FIG.  2.3. 


Figure  3.3  Job  Control  to  Edit  a Module 
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riSUKE  3.3  - JOB  CONTROL  TO  EDIT  A MOOuLE  (CONT) 
part  3 - at  hopkins  <apl> 

//AA*/CNA«E  JOB  (6401 ,USER*C*U*N) * 'VALID  JOB  CARO' 

//EDIT  EXEC  MEJITFLG 

//EDIT. BASE  00  OISPsOL 0*05 N=4A^C.YOJR. SOURCE. BAsEl 
//EDIT.SYSIN  00  * 

..♦o  • title  card  - appears  at  top  of  every  page 

• • • 

EOIT  COMMAND  DECK 

« • • 

/« 

//EDIT. PURGE  on  ()Sn  = AAWC. YOJR. BINARY. HaSEI  « 

//  OISP= (OLD, DELETE)  TO  PJRSE  OLD  BINARY 

//FORT • SYSLI N 00  0 1 SD= ( NrW . C A Tl5 ) * DSN= A A WC . YO JR . B I N AR Y . B ASE 1 * 
//  UNIT  = 3330.  V0L  = SER='JSAA*(C, 

//  SPACE=(TRK. (1,1) ,RLSE)  ---  TO  SAVE  BINARY 
//GO , SYS  I N DO  * 

. • • 

DATA 

. • • 

/* 

PROCS  SAME  AS  AT  AVSCOm.  prOCS  LISTED  IN  FIG.  E.3. 


Figure  3.3  Job  Control  to  Edit  a Module  (cont) 
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4.0  CREATING  A NEW  BASE  MODULE 


* « 


1 


After  changes  have  been  tested  and  proven,  these  changes  can  be  made 
permanent  by  creating  a base  module  that  reflects  all  these  changes.  This 
is  accomplished  by  changing  the  job  control  to  save  the  test  module  and 
using  the  same  MEDIT  comnand  deck  that  resulted  in  the  proven  test  module. 

The  changes  to  the  old  base  module  are  transferred  to  the  new  base 
module  when  the  test  module  is  saved.  The  new  base  module  is  renumbered 
with  the  new  sequence  numbers  in  columns  77  - 80. 

The  cost  of  an  edit  and  compile  run  is  determined  by  the  length  of 
the  base  module  and  not  by  the  number  of  changes  being  made.  Therefore, 
the  creation  of  a new  base  module  should  be  avoided  whenever  possible. 

The  time  to  create  a new  base  module  is  either: 

a.  When  production  runs  of  the  test  version  are  nearly  completed 
and  the  user  is  very  sure  that  no  additional  changes  will  be  required; 
or 

b.  When  the  edit  command  deck  exceeds  1000  cards,  approximately 
one-half  a box  of  cards. 

When  a new  base  module  is  created,  the  listing  and  binary  (compiled) 
deck  should  also  be  kept  as  a reference  for  as  long  as  this  base  module 
is  kept.  After  the  new  base  module  has  been  successfully  created  and 
compiled,  the  old  base  module  should  be  purged  together  with  its  listing 
and  binary  (compiled)  deck. 

The  various  parts  of  Figure  4.1  give  the  job  control  for  updating  a 
library  at  the  various  installations  where  MEDIT  has  been  implemented. 


FIGURE  4.1  - JOP  CONTROL  TO  UPDATE  BASE  MODULE 


PART  1 - AT  USA  AVSCDM,  ST.  LOUIS 

//MV4LIU  JOS  (1T01.M999) ,'A  VAlIO  JOB  CARO* 

/•SETUP  DMSENN 
//EDIT  EXEC  MEDITFLG 

//EDIT. TEST  DO  Dl S°= (NEW , KEEP >. DSNs YOUR. SOURCE .BASE2, 

//  UNITs2  3U.YULsSER=OMSENN,S  = ACE=(TRK.  (1.1)  ,RLSE) 

//EOT T .BASE  00  OISP=OLD. OSn=YOuR. SOURCE. 9ASE1 » 

//  UNIT=2314, VOL=SER=DMSENN 

//EDIT.SYSIN  DD  * 

..♦o  title  Caro  - appea9S  at  top  of  every  page 

• • • 

EDIT  COMMAND  DECK 

. . • 

/* 

//EDIT. PURGE  DD  0 1 SP= ( MOO.OELETE > » OSNsYOJR. 8! NAPY. BASE1 » 
//  UNlT=2314»V0L=SER=DMStNN  --a  TO  PURGE  OLD  BINARY 
//EORT.SYSLIN  DO  DISP= (NEW, KEEP) «DSN=YOUR. BINARY. 0ASE2. 
//  UNlTs2314.  VOL  = SER  = OMSt'NN, 

//  SPACE=(TRK» (1,1) ,PLSE)  ---  TO  SAVE  BINARY 

//GO. SYSIN  DD  * 

... 

DATA 

... 

/* 

procs  same  as  at  avscdm.  procs  listed  in  fig.  2.3. 


PART  2 - AT  USAMSSA  (PENTAGON) 

//ZXMAMERO  JOB  (2401, 1207,1,20, 999, 1, 1«P)  ♦ 

//  • ih  valid  JO3  Caro  u»,cl&ss=o 

/•ROJTE  XED  CAA-RIA 
//EDIT  EXEC  MEDITFLG 

//edit. test  00  disp*(new,catlg) ,dsn*aawc. your. source. base?. 

//  UNIT=3330,VOL=SER=USAA«C.SPACE=(TR<, (1,1) ,RLSE) 

//EDIT. BASE  DD  01 Sp=0L D, DSN= A AwC. YOUR. SO JRCE . B ASE1 
//EDIT.SYSIN  DD  * 

..♦o  title  card  - appears  at  top  of  every  page 

• • • 

EDIT  COMMAND  0EC< 

... 

/* 

//EDIT. PURGE  OD  DSN=AA«*C.YOUR.qlNARY.BASEl  , 

//  DISP=(MOD, DELETE)  — TO  DELETE  OLD  BINARY 

//FORT .SYSLIN  DO  DISPs(NEW.CATlS),DSNsAAWC. YOUR. BINARY. BASE?, 

//  UNIT=3330,VOLsSER=USAAWC, 

//  SPACE*(TR<» (1,1) ,RlSE)  ---  TO  SAVE  BINARY 

//GO. SYSIN  00  • 

• » • 

DATA 

. . • 

/• 

PROCS  SAME  AS  AT  AVSCOM.  PROCS  LISTED  IN  FIG.  2.3, 


Figure  4.1  Job  Control  to  Update  Base  Module 
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FIGURE  4.1  - JOB  CONTROL  TO  UPDATE  B&Se  MODULE  (CONT), 

PART  3 - AT  HOPKINS  (APL) 

//AAiKCNAME  JOP  (6401  .USFR.C.J.N)  *•  VALID  J09  CARD* 

//EDIT  FXEC  MEOITFLP 

//EDIT. TEST  DD  DISd=(NEW,CATL3)»DSN  = aA“i/C,Y0UR.S0JPCE.8ASE2* 

//  UNIT=3330.VOL=SFR=USAArtC,SPACr=(TR<.  (1.1)  ,RLSE) 

//EDIT. BASE  DO  DISP  = 0LD,DSn=AA*iC.Y0UR.S0JRCE.8AsE1 
//EDIT.SYSIN  DO  * 

..♦o  title  card  - appears  at  top  oe  every  page 

. . • 

EDIT  command  deck 

• » • 

/* 

//EDIT. PURGE  03  DSm=aawc. YOJR. BINARY. BASE1 . 

//  DISP= (OLO.DELFTE)  TO  PURGE  OLD  BINARY 

//FORT.SYSLIN  03  DlsP=(NEW, CAT |_ 3). DSN=AAJC, YOUR. BINARY, BASE?. 
//  UMIT=3330. VOL=SER=USAA*C. 

//  SPACE=(TRK.  (I.D.plSE)  - — TO  SAVE  BINARY 

//GO. SYS  I N DD  * 

• . • 

DATA 
. . • 

/* 

PROCS  SAME  AS  AT  AVSCDm.  PROCS  LISTED  IN  FIG.  2,3. 


Figure  4.1  Job  Control  to  Update  Base  Module  (cont) 


4-3  The  following  page  is  blank. 


A.O  APPENDIX  - LISTING  OF  THE  MEDIT  PROGRAM 

NOTE:  This  is  a listing  of  the  CDC-6000  version  of  MEDIT. 


This  source 


was  the  result  of  the  editing  described  in  Figures  3,1  and  3,2, 
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Defense  Communication  Engineering  Office 
ATTN:  Mr.  Roy  Rosner  (1) 

Reston,  VA 


Foreign  Science  and  Technology  Center 
ATTN:  Mr.  Reg  Barta  (1) 

ATTN:  Mr.  David  Howell  (1) 

ATTN:  Mr.  Thomas  Pruden  (1) 

Charlottesville,  VA 


Commander 

US  Army  Missile  Command 
ATTN:  AMCMI,  Mr.  Jim  Collins  (2) 

ATTN:  AMCMI,  Mr.  James  Williams(l) 

Redstone  Arsenal,  AL  35809 

US  Army  Aberdeen  Proving  Ground 
ATTN:  Mr.  J.  Whallon  (1) 

Aberdeen  Proving  Ground,  MD  21005 


Defense  Documentation  Center 
ATTN:  TIPCR  (12) 

Cameron  Station 
Alexandria,  VA  22314 


of  the  Army 


Commander 

US  Army  Electronic  Command 
light  Vision  Laboratory 
ATTN:  Mr.  John  Dehne  (1) 

ATTN:  Mr.  R.  A.  Oswalt  (1) 

Ft.  Monmouth,  NJ  07703 


Commander 

US  Army  Materiel  and  Mechanics  Research  Center 
ATTN:  AMXMR-S,  Mr.  R.  J.  Geromini  (1) 

ATTN:  AMXMR-S,  Mr.  D.  M.  Gracia  (1) 

Watertown,  MA  02172 


Commander 

US  Army  Ames  Research  Center 

Air  Mobility  Research  & Development  Laboratory 
ATTN:  SAVDL-AS,  Dr.  J.  Hwang  (1) 

ATTN:  SAVDL-D , Mr.  Mike  Kodani  (1) 

Moffett  Field,  CA  94035 


Commander 

US  Army  Test  4 Evaluation  Command 
ATTN:  AMSTE,  Mr.  Leon  Brill  (1) 

Aberdeen  Proving  Ground,  MD  21005 


Commander 

US  Army  Electronic  Command 

ATTN:  AMSEL-SA-L,  Mr.  Richard  Caccamise  (1) 

ATTN:  AMSEL-I0,  Mr.  Henry  Chambers  (1) 

ATTN:  AMSEL-IO,  Mr.  Thomas  Dames  (2) 

ATTN:  AMSEL-IO,  Mr.  W.  R.  King  (1) 

ATTN:  AMSEL-IO,  Mr.  E.  Oltarzewski  (1) 

Ft.  Monmouth,  NJ  07703 


Commander 
Picatinny  Arsenal 
ATTN:  SARPA,  Mr.  A.G.  Edwards  (1) 

ATTN:  SARPA-MIS,  Mr.  David 

Grobsteln  (2) 

Dover,  NJ  07801 

Commander 
Edgewood  Arsenal 

ATTN:  SAREA,  Mr.  S.  Goldberg  (2) 

Edgewood,  MD  21005 

Commander 

US  Army  Aviation  Systems  Command 
ATTN:  Mr.  Paul  Lascala  (2) 

ATTN:  Dr.  I.  Peterson  (1) 

St.  Louis,  MO  63166 

Commander 

Watervliet  Arsenal 

ATTN:  SARWV,  Mr.  James  Pascale  (2) 

Watervliet,  NY  12189 

Commander 

Yuma  Proving  Ground 
ATTN:  Mr.  Fred  Jones  (1) 

Yuma,  AZ  85364 

Director 

US  Army  Mobility  Research  & 

Development  Center 

ATTN:  STSFB,  Mr.  H.  Bero  (1) 

ATTN:  STSFB,  Mr.  Sam  McCutchen  (2) 

Fort  Belvoir,  VA  22060 


B-l 


[US  Army  Harry  Diamond  Laboratories 

ATTN:  AMXDO,  Mr.  Hubert  Matthews  (1) 

ATTN:  AMXDO,  Ms.  L.  Jean  Marrolettl  (1) 

Washington,  DC  20438 

Director 

US  Army  Ballistic  Research  Laboratory 
ATTN:  Mr.  Sam  Taylor  (1) 

Aberdeen,  MD  21005 

Commander 

US  Army  Materiel  Development  and  Readiness  Command 
ATTN:  DRCMS , Mr.  John  Cianflone  (1) 

ATTN:  DRCMS,  Mr.  John  Gilbert  (1) 

ATTN:  DRCMS,  Dr.  Ronald  Uhlig  (1) 

5001  Eisenhower  Avenue 
Alexandria,  VA  22333 

Commander 

US  Army  Armament  Command 
ATTN:  DRSAR-SA,  Mr.  Stu  Olson  (1) 

ATTN:  DRSAR-MSE  (1) 

ATTN:  DRSAR-MST  (1) 

ATTN:  DRSAR-JCAP-E  (1) 

ATTN:  DRSAR-JCAP-M  (1) 

Rock  Island,  IL  61201 

Commander 

Rock  Island  Arsenal 
ATTN:  SARRI-L  (1) 

ATTN:  SARRI-LPL  (2) 

ATTN:  SARRI-LA  (5) 

ATTN:  SARRI-LE  (5) 

ATTN:  SARR1-LR  (10) 

ATTN:  SARRI-LS  (5) 

ATTN:  SARRI-LW  (5) 

ATTN:  SARRI-LR-S,  Dr.  Hurt  (10) 

ATTN:  SARRI-R  (1) 

Rock  Island,  IL  61201 

Commander 

White  Sands  Missile  Range 
ATTN:  Mr.  James  Field  (1) 

White  Sands  Missile  Range,  NM  88002 
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DISTRIBUTION  LIST  UPDATE 


FOR  YOUR  CONVENIENCE  


Government  regulations  require  the  maintenance  of  up-to-date 
distribution  lists  for  technical  reports.  This  form  Is  provided 
for  your  convenience  to  indicate  necessary  changes  or  corrections. 

If  a change  In  our  mailing  lists  should  be  made,  please  check 
the  appropriate  boxes  below.  For  changes  or  corrections,  show  old 
address  zxactty  as  It  appeared  on  the  mailing  label.  Fold  on  dotted 
lines,  tape  or  staple  the  lower  edge  together,  and  mall. 


n mm  nm  rro»  Liat 
ESS  i 


COMMENTS 


Date: Signature: 


□ Otange  or  Corroct  Address 


Technical  Report  # R-TR- 76-010 
SARRI  Form  900-643  (One-Time)  (I  Feb  75) 


1 


FOLD  HERE 

Return  Address: 


OFFICIAL  BUSINESS 
Penalty  tor  Private  Use  *300 


Commander 

Rock  Island  Arsenal 

Attn:  SARRI-LR-S 

Rock  Island,  Illinois  61201 


FOLD  HERE 
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